home *** CD-ROM | disk | FTP | other *** search
Wrap
Text File | 1991-10-11 | 68.3 KB | 1,262 lines
card_5555.xml <?xml version="1.0" encoding="utf-8" ?> <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" > <card> <id>5555</id> <filler1>0</filler1> <bitmap>BMAP_6336.pbm</bitmap> <cantDelete> <true /> </cantDelete> <showPict> <true /> </showPict> <dontSearch> <false /> </dontSearch> <owner>2672</owner> <link rel="stylesheet" type="text/css" href="stylesheet_3289.css" /> <part> <id>30</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>152</left> <top>0</top> <right>512</right> <bottom>200</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>mapbtn</name> <script></script> </part> <part> <id>36</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>289</left> <top>100</top> <right>305</right> <bottom>116</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>32426</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>sun</name> <script>--——————— card button "sun" 10/6/91 10:29 PM -- -- HANDLERS: mouseUp(globals:GrayLineFlag,lastact),mousewithin -- --——————– on mouseUp global GrayLineFlag, lastact if the shiftkey is down then if GrayLineFlag is "true" then set the highlight of me to "true" put "false" into Graylineflag set cursor to "watch" lock screen go cd "c2" choose select tool domenu "Select All" domenu "Copy Picture" go cd "c1" domenu "Paste Picture" choose browse tool unlock screen else set the highlight of me to "false" put "true" into Graylineflag put the ticks into lastact end if else if GrayLineFlag is "true" then dograylineNow end if end mouseUp on mousewithin if the highlight of me is "true" then hcballoon "This button indicates the location on the Earth at which the Sun is directly overhead." &&¬ "Click on the button with the shift key depressed to enable the drawing of the grayline." else hcballoon "This button indicates the location on the Earth at which the Sun is directly overhead." &&¬ "Click on this button to update the position of the grayline immediately." &&¬ "Click on the button with the shift key depressed to disable the drawing of the grayline." end if end mousewithin </script> </part> <part> <id>10</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>3</left> <top>4</top> <right>153</right> <bottom>181</bottom> </rect> <style>transparent</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>MonaHam</font> <textSize>12</textSize> <textStyle>plain</textStyle> <textHeight>16</textHeight> <name>f1</name> <script>--——————— card field "f1" 10/6/91 10:29 PM -- -- HANDLERS: mousedownx,mousewithin -- --——————– on mousedownx if the textsize of me is 12 then set the textsize of me to 9 else set the textsize of me to 12 end if end mousedownx on mousewithin put "This field shows information about" && ¬ line 1 of me & "." into thestr hcballoon thestr,40,40 end mousewithin </script> </part> <part> <id>1</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <true /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>0</left> <top>0</top> <right>153</right> <bottom>182</bottom> </rect> <style>scrolling</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>MonaHam</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>country list</name> <script>--——————— card field "country list" 10/6/91 10:29 PM -- -- HANDLERS: mousedown,mousewithin -- --——————– on mousedown play "clicker" set the cursor to "watch" put the clickline into tcl select tcl showinfo(char 26 to 29 of the value of tcl) set the cursor to 1 end mousedown on mousewithin hcballoon "Select a DXCC country by clicking on the name of the country." &&¬ "Typing a letter on the keyboard will scroll the list to the first country beginning with that letter.",20,100 end mousewithin </script> </part> <part> <id>11</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>474</left> <top>185</top> <right>486</right> <bottom>200</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>31392</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>help</name> <script>--——————— card button "help" 10/6/91 10:29 PM -- -- HANDLERS: mouseup,mousewithin -- --——————– on mouseup show cd fld "info1" end mouseup on mousewithin hcballoon "Click on this button to show a field containing more information about this stack." end mousewithin</script> </part> <part> <id>15</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>247</left> <top>47</top> <right>259</right> <bottom>59</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>24420</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>here</name> <script>--——————— card button "here" 10/6/91 10:29 PM -- -- HANDLERS: mouseDown,mouseStillDown,mouseup(globals:lastact, -- mylat,mylon,tz),mousewithin -- --——————– on mouseDown set cursor to "cross" put empty into cd fld "f1" hide cd fld "country list" put "Show List" into cd fld "list" end mouseDown on mouseStillDown trackit end mouseStillDown on mouseup global lastact,mylat,mylon,tz put round(90 - (0.89109 * (item 2 of the loc of me))) into lat put round((item 1 of the loc of me - 153) * 1.0056 - 180) into lon put lat into mylat put lon into mylon put abs(lat) into cd fld "lat" of cd "config" put abs(lon) into cd fld "lon" of cd "config" if lat<0 then set the highlight of btn "N" of cd "config" to "false" set the highlight of btn "S" of cd "config" to "true" else set the highlight of btn "S" of cd "config" to "false" set the highlight of btn "N" of cd "config" to "true" end if if lon<0 then set the highlight of btn "E" of cd "config" to "false" set the highlight of btn "W" of cd "config" to "true" else set the highlight of btn "W" of cd "config" to "false" set the highlight of btn "E" of cd "config" to "true" end if set the highlight of btn "location" of cd "config" to "false" hide btn "lochide" of cd "config" put empty into tz put the loc of me into pos if (item 1 of pos) > 483 then put 483 into item 1 of pos if (item 1 of pos) < 181 then put 181 into item 1 of pos put 5 into item 2 of pos set the loc of cd fld "localtime" to pos put the ticks into lastact end mouseup on mousewithin hcballoon "This button marks your location. You may move it around by mousing down and dragging it." end mousewithin</script> </part> <part> <id>18</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>344</left> <top>29</top> <right>356</right> <bottom>41</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>20254</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>there</name> <script>--——————— card button "there" 10/6/91 10:29 PM -- -- HANDLERS: mouseDown,mouseStillDown,mouseup(globals:lastact, -- mylat,mylon),mousewithin -- --——————– on mouseDown set cursor to "cross" put empty into cd fld "f1" hide cd fld "country list" put "Show List" into cd fld "list" set textstyle of cd fld "f1" to "plain" put empty into cd fld "otz" hide cd fld "otime" end mouseDown on mouseStillDown trackit end mouseStillDown on mouseup global lastact,mylat,mylon put round(90 - (0.89109 * item 2 of the loc of me)) into lat put round((item 1 of the loc of me - 153) * 1.0056 - 180) into lon if mylat is empty and mylon is empty then else coords mylat, mylon, lat, lon put the result into distx put return & "Distance: " & round(item 1 of distx) & " mi" ¬ & return & " " ¬ & round(item 2 of distx) & " km" & return & "Bearing: " &¬ round(item 3 of distx) & numtochar(161) & return¬ after cd fld "f1" end if put the ticks into lastact end mouseup on mousewithin hcballoon "This button marks the remote location. You may move it around by mousing down and dragging it." end mousewithin</script> </part> <part> <id>22</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>303</left> <top>188</top> <right>360</right> <bottom>201</bottom> </rect> <style>rectangle</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>MonaHam</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>UTCtime</name> <script>--——————— card field "UTCtime" 10/6/91 10:29 PM -- -- HANDLERS: mousewithin -- --——————– on mousewithin hcballoon "This field displays the Coordinated Universal Time (UTC)." end mousewithin</script> </part> <part> <id>25</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>225</left> <top>65535</top> <right>281</right> <bottom>12</bottom> </rect> <style>rectangle</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>MonaHam</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>localtime</name> <script>--——————— card field "localtime" 10/6/91 10:29 PM -- -- HANDLERS: mousewithin -- --——————– on mousewithin hcballoon "This field displays your local time." end mousewithin </script> </part> <part> <id>23</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>322</left> <top>65535</top> <right>378</right> <bottom>12</bottom> </rect> <style>rectangle</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>MonaHam</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>otime</name> <script>--——————— card field "otime" 10/6/91 10:29 PM -- -- HANDLERS: mousewithin -- --——————– on mousewithin hcballoon "This field displays the local time at the remote location." && ¬ "This is the standard time. If summer time is in effect at this location then add one hour." end mousewithin </script> </part> <part> <id>35</id> <type>button</type> <visible> <false /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>78</left> <top>182</top> <right>151</right> <bottom>200</bottom> </rect> <style>opaque</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>cloak</name> <script></script> </part> <part> <id>47</id> <type>field</type> <visible> <false /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>170</left> <top>119</top> <right>231</right> <bottom>138</bottom> </rect> <style>transparent</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>Geneva</font> <textSize>12</textSize> <textStyle>plain</textStyle> <textHeight>16</textHeight> <name>otz</name> <script></script> </part> <part> <id>51</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>4</left> <top>184</top> <right>71</right> <bottom>199</bottom> </rect> <style>shadow</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>MonaHam</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>find call</name> <script>--——————— card field "find call" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp(globals:lastact),mousewithin -- --——————– on mouseUp global lastact play "clicker" ask "What call or prefix?" if the result is not "Cancel" then put it into tc put CallToNum(tc) into cn if item 1 of cn is 1 then ShowInfo(item 2 of cn) end if if (item 1 of cn) > 1 then put empty into cl put empty into scl repeat with i = 2 to (number of items in cn) put NumToInfo(item i of cn) & return after cl put item 2 of line i-1 of cl & return after scl end repeat put XScrollBox(0,"Ambiguous call - Select one:",scl) into ans if ans is not empty then ShowInfo(item (1 + (item 1 of ans)) of cn) end if end if if item 1 of cn is 0 then beep answer "Sorry, that callsign or prefix is unknown or incomplete." with "OK" end if end if put the ticks into lastact end mouseUp on mousewithin HCBalloon "Click this button to find a DXCC country by callsign. " &&¬ "You will be prompted to type in a callsign." end mousewithin</script> </part> <part> <id>52</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>78</left> <top>184</top> <right>145</right> <bottom>199</bottom> </rect> <style>shadow</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>MonaHam</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>list</name> <script>--——————— card field "list" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp(globals:lastact),mousewithin -- --——————– on mouseUp global lastact play "clicker" if me is "Show List" then show cd fld "country list" put "Hide List" into me else hide cd fld "country list" put "Show List" into me end if put the ticks into lastact end mouseUp on mousewithin if me is "Show List" then HCBalloon "Click this button to show a scrolling list of DXCC countries." else HCBalloon "Click this button to hide the scrolling list of DXCC countries above." end if end mousewithin </script> </part> <part> <id>53</id> <type>field</type> <visible> <false /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>159</left> <top>143</top> <right>314</right> <bottom>182</bottom> </rect> <style>shadow</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>icago</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>timeinfo</name> <script></script> </part> <part> <id>54</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>493</left> <top>185</top> <right>511</right> <bottom>199</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>16560</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>config</name> <script>--——————— card button "config" 10/6/91 10:29 PM -- -- HANDLERS: mouseup,mousewithin -- --——————– on mouseup visual scroll left go cd "config" end mouseup on mousewithin hcballoon "Click on this button to go to the configuration card," &&¬ "where various options may be set." end mousewithin</script> </part> <part> <id>57</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>155</left> <top>185</top> <right>172</right> <bottom>200</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>21847</icon> <textAlign>center</textAlign> <font>icago~</font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>gohome</name> <script>--——————— card button "gohome" 10/6/91 10:29 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp visual effect dissolve fast go home end mouseUp on mousewithin HCBalloon "Click this button to go to the Home card." end mousewithin </script> </part> <part> <id>56</id> <type>field</type> <visible> <false /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>0</left> <top>0</top> <right>512</right> <bottom>200</bottom> </rect> <style>scrolling</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>Geneva</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>info1</name> <script>--——————— card field "info1" 10/6/91 10:30 PM -- -- HANDLERS: mousedown,mousewithin -- --——————– on mousedown --show cd fld "info2" hide me end mousedown on mousewithin HCBalloon "Click on this field to hide it.",200,100 end mousewithin </script> </part> <content> <layer>card</layer> <id>1</id> <text>Abu Ail, Jabal at Tair 324 Afghanistan 234 Agalega & St Brandon 270 Aland Is 129 Alaska 115 Albania 247 Algeria 307 Am Samoa 112 Amsterdam & St Paul Is 59 Andaman & Nicobar Is 224 Andorra 12 Angola 30 Anguilla 210 Antarctica 17 Antigua, Barbuda 194 Argentina 121 Armenia 187 Aruba 137 Ascension Is 251 Auckland, Campbell Is 261 Australia 201 Austria 127 Aves Is 245 Azerbaijan 185 Azores 26 Bahamas 14 Bahrain 7 Baker & Howland Is 104 Balearic Is 36 Banaba 162 Bangladesh 146 Barbados 308 Belau 102 Belgium 132 Belize 195 Benin 178 Bermuda 219 Bhutan 4 Bolivia 23 Botswana 1 Bouvet 282 Br Virgin Is 212 Brazil 141 Brunei 199 Bulgaria 124 Burkina Faso 228 Burma 232 Burundi 320 Byelorussia 184 Cambodia 229 Cameroon 171 Canada 200 Canary Is 37 Cape Verde 31 Cayman Is 253 Central African Rep 173 Central Kiribati 160 Ceuta & Melilla 38 Chad 176 Chagos 220 Chatham Is 259 Chile 16 China 10 Christmas Is 204 Clipperton Is 49 Cocos Is 170 Cocos-Keeling Is 205 Colombia 77 Comoros 32 Congo 174 Conway Reef 275 Corsica 172 Costa Rica 169 Crete 157 Crozet 57 Cuba 22 Cyprus 292 Cyprus SBA 249 Czechoslovakia 131 Denmark 135 Desecheo Is 119 Djibouti 88 Dodecanese 156 Dominica 92 Dominican Rep 76 East Kiribati 161 East Malaysia 317 Easter Is 18 Ecuador 73 Egypt 154 El Salvador 242 England 62 Equatorial Guinea 273 Estonia 42 Ethiopia 43 Falkland Is 214 Faroe Is 134 Fernando de Noronha 142 Fiji Is 276 Finland 128 France 44 Franz Josef Land 285 French Guiana 61 French Polynesia 50 Gabon 175 Galapagos Is 74 Georgia 186 Germany 33 Ghana 311 Gibraltar 248 Glorioso Is 52 Greece 155 Greenland 133 Grenada 89 Guadeloupe 45 Guam 105 Guantanamo Bay 103 Guatemala 168 Guernsey 67 Guinea 281 Guinea-Bissau 90 Guyana 310 Haiti 75 Hawaii 110 Heard Is 208 Honduras 82 Hong Kong 222 Hungary 70 Iceland 167 India 223 Indonesia 235 Iran 41 Iraq 236 Ireland 39 Isle of Man 63 Israel 290 Italy 86 ITU Geneva 287 Ivory Coast 177 Jamaica 303 Jan Mayen 99 Japan 94 Jersey 65 Johnston Is 106 Jordan 100 Juan de Nova, Europa 53 Juan Fernandez 20 Kaliningrad 181 Kazakhstan 191 Kenya 301 Kerguelen Is 58 Kermadec Is 260 Kingman Reef 109 Kirghizia 192 Korea 80 Kure Is 111 Kuwait 314 Laccadive Is 225 Laos 230 Latvia 239 Lebanon 126 Lesotho 305 Liberia 40 Libya 291 Liechtenstein 72 Lithuania 123 Lord Howe Is 202 Luxembourg 122 Macao 231 Macquarie Is 209 Madagascar 295 Madeira Is 25 Malawi 306 Maldive Is 309 Mali 179 Malpelo Is 78 Malta 312 Malta SMO 267 Malyj Vysotskij Is 284 Mariana Is 114 Market Reef 130 Marshall Is 198 Martinique 48 Mauritania 296 Mauritius 271 Mayotte 46 Mellish Reef 206 Mexico 226 Micronesia 197 Midway Is 107 Minami Torishima 95 Moldavia 193 Monaco 269 Mongolia 97 Montserrat 211 Morocco 21 Mozambique 15 Mt Athos 158 Namibia 264 Nauru 11 Navassa Is 116 Nepal 318 Neth Antilles 139 Netherlands 138 New Caledonia 47 New Zealand 258 Nicaragua 240 Niger 297 Nigeria 294 Niue 256 No Cook Is 254 No Ireland 64 Norfolk Is 203 Norway 120 Ogasawara 96 Oman 3 Pagalu 274 Pakistan 8 Palmyra, Jarvis Is 108 Panama 81 Papua New Guinea 136 Paraguay 262 Peru 125 Peter I 283 Philippines 34 Pitcairn Is 221 Poland 151 Portugal 24 Pr Edward & Marion Is 265 Puerto Rico 118 Qatar 6 Reunion 54 Revilla Gigedo 227 Rodriguez Is 272 Romania 241 Rotuma 277 Russia (Asiatic) 182 Russia (European) 180 Rwanda 322 Sable Is 29 San Andres & Provid. 79 San Felix 19 San Marino 165 Sao Tome & Principe 148 Sardinia 87 Saudi Arabia 85 Scotland 66 Senegal 302 Seychelles 147 Sierra Leone 315 Singapore 321 So Africa 263 So Cook Is 255 So Georgia Is 215 So Orkney Is 216 So Sandwich Is 217 So Shetland Is 218 Solomon Is 69 Somali 164 Southern Sudan 153 Spain 35 Spratly Is 268 Sri Lanka 286 St Helena 250 St Kitts, Nevis 196 St Lucia 91 St Maarten,Saba,StEus 140 St Martin 56 St Paul Is 28 St Peter & St Paul 143 St Pierre & Miquelon 51 St Vincent 93 Sudan 152 Surinam 145 Svalbard 98 Swaziland 278 Sweden 150 Switzerland 71 Syria 238 Tadzhikistan 190 Taiwan 9 Tanzania 293 Thailand 83 The Gambia 13 Togo 298 Tokelau Is 257 Tonga 2 Trindade & Martin Vaz 144 Trinidad & Tobago 323 Tristan da Cunha&Gough 252 Tromelin 55 Tunisia 279 Turkey 166 Turkmenistan 188 Turks & Caicos Is 213 Tuvalu 159 Uganda 300 Ukraine 183 UN HQ 288 United Arab Emirates 5 United States 101 Uruguay 27 Uzbekistan 189 Vanuatu 237 Vatican 84 Venezuela 244 Vietnam 280 Virgin Is 117 Wake Is 113 Wales 68 Wallis & Futuna Is 60 Walvis Bay 266 West Kiribati 163 West Malaysia 316 Western Sahara 149 Western Samoa 299 Willis Is 207 Yemen 304 Yugoslavia 243 Zaire 319 Zambia 313 Zimbabwe 246</text> </content> <content> <layer>card</layer> <id>22</id> <text>1405 UTC</text> </content> <content> <layer>card</layer> <id>25</id> <text>10:05 AM</text> </content> <content> <layer>card</layer> <id>23</id> <text>3:05 PM</text> </content> <content> <layer>card</layer> <id>51</id> <text>Find Call</text> </content> <content> <layer>card</layer> <id>52</id> <text>Hide List</text> </content> <content> <layer>card</layer> <id>53</id> <text>-68 until next task 10 until out of date -113 until next check</text> </content> <content> <layer>card</layer> <id>56</id> <text><span class="style16">DX Map 1.1 by Len Saaf, NV2Z </span><span class="style17"> </span><span class="style18">(click on this field to hide) </span><span class="style15">Copyright 1990,1991, Raleigh Associates </span><span class="style12"> </span><span class="style18">This stack is freeware. It may be distributed in part or in whole provided that it is distributed for free. This stack enables amateur radio operators to find the location, bearing, and other information for the 'DXCC' countries of the world. It also displays the day and night portions of the globe dynamically. </span><span class="style19">DX Map features: </span><span class="style18">• Your QTH is marked on the map and your local time appears above it (12 or 24 hour format). • UTC is displayed at the bottom of the map. • A dynamic grayline is shown on the map showing the day and night portions of the globe. • A DXCC country can by selected by either choosing the country name from a list or by entering a callsign or prefix. The DXCC country is marked on the map and the following information is listed: • Country name • Continent • CQ zone(s) • ITU zone(s) • Distance from your QTH in miles and kilometers • Bearing in degrees from your QTH • Callsign allocation • The local time in the DXCC country is displayed above its location on the map • Your location and the remote location are fully adjustable. </span><span class="style19">Using DX Map: </span><span class="style18"> </span><span class="style20">To get Help: </span><span class="style18">Read this or use Balloon Help. </span><span class="style20">To choose a DXCC country from a list of countries: </span><span class="style18">If the scrolling list is not already visible at the left-hand side of the card, click the "Show List" button. Select a DXCC country by clicking on the name of the country. When the scrolling list is visible typing a letter will scroll the list to the first country that begins with that letter. </span><span class="style20">To choose a DXCC country from a prefix or callsign: </span><span class="style18">Click the "Find Call" button and you will be prompted for a callsign or prefix. </span><span class="style20">To find the distance and bearing to any location on the map: </span><span class="style18">Click and hold on the icon that marks the remote location. It is the one with the "X" cross. Move the icon to the desired location and release the mouse button. Note that the time at the remote location is not displayed since the remote time zone information is unknown. </span><span class="style20">To update the grayline immediately: </span><span class="style18">Click on the "Sun" button. </span><span class="style20">To turn off the grayline display: </span><span class="style18">Click on the "Sun" button while depressing the shift key. The sun button will turn black and the grayline will be removed. To reactive the grayline function click the sun button again with the shift key depressed. </span><span class="style19">Configuring DX Map </span><span class="style20">Changing your QTH: </span><span class="style18">One way to change your QTH is to click and hold on the small button that marks your QTH. You can then drag it to any position. Your local time remains unchanged. Another way to change your QTH is to go to the configuration card by clicking on the small right arrow button at the lower right-hand corner of the map card. The configuration card lets you choose whether or not you want to use the information stored in your Mac's parameter RAM for your QTH information. This information can be set using the Map control panel, which is part of the Macintosh system software. If you choose not to use that information, uncheck the box and some fields and buttons will appear that will let you specify the latitude and longitude of your QTH. You can also click on the "By Call" button to enter the location by callsign or prefix (This will also set your local time difference from UTC). </span><span class="style20">To change your local time zone information:</span><span class="style19"> </span><span class="style18">The difference between your local time and UTC can be set at the configuration card (see above). If you uncheck the "Time Zone" check box, controls will appear to let you enter your local UTC time difference. </span><span class="style20">Dealing with daylight savings time: </span><span class="style18">On the configuration card there is a checkbox titled "Auto Daylight Savings." If this box is checked the stack will figure out whether or not DST (daylight savings time, a.k.a. summer time) is in effect in the USA and set the UTC time difference accordingly. (You still need to set your Mac's clock to the correct local time—be it standard or daylight savings.) If you don't use summer time, or if the rules for it are different at your QTH, uncheck the "Auto Daylight Savings" checkbox and use the radio buttons (that will appear) to choose between standard and daylight savings time. You can also modify the daylightsavingstime() function in the stack script to meet your needs. I have no data on the countries that use summer time so the time for remote locations is always standard time. Summer time is one hour later in most (if not all) cases. </span><span class="style20">To change the frequency at which the grayline is updated: </span><span class="style18">See the notes in the 'openstack' handler in the stack script. </span><span class="style19">Bugs: </span><span class="style18">Probably lots. The identification of DXCC countries from callsign surely has quite a few glitches. If any of the cards are deleted the stack will get very confused. Best to make a copy just in case. </span><span class="style19">More info: </span><span class="style18">I wrote 3 XFCNs for this stack: • "CallToNum" takes a callsign and returns the number of DXCC countries that could have that callsign followed by ID numbers for each of those DXCC countries. • "NumToInfo" takes one of those ID numbers and returns a bunch of info for that DXCC country. The info is from a list I got off rec.ham-radio. • "coords" takes 2 lattitude/longitude pairs and returns the distance between them and the bearing from the first to the second. The source code to these 3 XFCNs is free for the asking. It is written in Pascal. Thanks to Mike Hoenig, N5LTL, for suggestions and encouragement! All bug reports, comments and/or suggestions are welcome. My addresses are: Len Saaf 52 Raleigh St. Rochester, NY 14620 Internet: saaf@joker.optics.rochester.edu </span></text> </content> <content> <layer>card</layer> <id>47</id> <text>-1</text> </content> <content> <layer>card</layer> <id>10</id> <text>Sweden SM (Europe) CQ zone: 14 ITU zone: 18 Distance: 3963 mi 6378 km Bearing: 37° Calls: SA-SM, 7S, 8S</text> </content> <name>c1</name> <script>--——————— card "c1" 10/6/91 10:28 PM -- -- HANDLERS: ShowInfo(globals:lastact,mylat,mylon),keydown -- (globals:lastact),idle(globals:needfix,itime,nexttask, -- lastact,lastupd,updateInterval,delayInterval,GrayLineFlag) -- --——————– on ShowInfo tnum global lastact,mylat,mylon put NumToInfo(tnum) into linex put semitocom(item 2 of linex) & return & item 1 of linex & ¬ " (" & item 3 of linex & ")" & return ¬ & "CQ zone: " & semitocomns(item 5 of linex) & return & "ITU zone: " &¬ semitocomns(item 4 of linex) & return into cd fld "f1" hide cd fld "country list" put "Show List" into cd fld "list" put item 7 of linex into lat put item 8 of linex into lon coords mylat, mylon, lat, lon,tz put the result into distx put "Distance: " & round(item 1 of distx) & " mi" & return & ¬ " " ¬ & round(item 2 of distx) & " km" & return & "Bearing: " &¬ round(item 3 of distx) & numtochar(161) & return ¬ & "Calls: " & semitocom(item 9 of linex) after cd fld "f1" if (number of chars in cd fld "f1") > 152 then set the textsize of cd fld "f1" to 9 else set the textsize of cd fld "f1" to 12 end if put -(item 6 of linex) into cd fld "otz" put the time into ttemp convert ttemp to seconds convert ttemp to short time put round((lon + 180) * 0.994444 + 153) & "," into pos put round((90-lat) * 1.1222222) after pos set the location of btn "there" to pos if tz is not empty then if (item 1 of pos) > 483 then put 483 into item 1 of pos if (item 1 of pos) < 181 then put 181 into item 1 of pos if abs((item 1 of pos)-(item 1 of (the loc of cd fld "localtime")))¬ < 56 then put 17 into item 2 of pos else put 5 into item 2 of pos end if set the loc of cd fld "otime" to pos show cd fld "otime" updateTime else hide cd fld "otime" hide cd fld "utctime" end if repeat with jjj=1 to 5 set the highlight of btn "there" to true set the highlight of btn "there" to false end repeat put the ticks into lastact end showinfo on keydown thekey global lastact if the visible of cd fld "country list" is "false" then pass keydown else if thekey is "a" then set the scroll of cd fld "country list" to 0 if thekey is "b" then set the scroll of cd fld "country list" to 300 if thekey is "c" then set the scroll of cd fld "country list" to 588 if thekey is "d" then set the scroll of cd fld "country list" to 948 if thekey is "e" then set the scroll of cd fld "country list" to 1020 if thekey is "f" then set the scroll of cd fld "country list" to 1140 if thekey is "g" then set the scroll of cd fld "country list" to 1248 if thekey is "h" then set the scroll of cd fld "country list" to 1464 if thekey is "i" then set the scroll of cd fld "country list" to 1536 if thekey is "j" then set the scroll of cd fld "country list" to 1668 if thekey is "k" then set the scroll of cd fld "country list" to 1764 if thekey is "l" then set the scroll of cd fld "country list" to 1884 if thekey is "m" then set the scroll of cd fld "country list" to 2016 if thekey is "n" then set the scroll of cd fld "country list" to 2376 if thekey is "o" then set the scroll of cd fld "country list" to 2568 if thekey is "p" then set the scroll of cd fld "country list" to 2592 if thekey is "q" then set the scroll of cd fld "country list" to 2760 if thekey is "r" then set the scroll of cd fld "country list" to 2772 if thekey is "s" then set the scroll of cd fld "country list" to 2868 if thekey is "t" then set the scroll of cd fld "country list" to 3348 if thekey is "u" then set the scroll of cd fld "country list" to 3552 if thekey is "v" then set the scroll of cd fld "country list" to 3636 if thekey is "w" then set the scroll of cd fld "country list" to 3684 if thekey is "x" then set the scroll of cd fld "country list" to 3684 if thekey is "y" then set the scroll of cd fld "country list" to 3684 if thekey is "z" then set the scroll of cd fld "country list" to 3684 end if put the ticks into lastact end keydown on idle global needfix, itime, nexttask, lastact, lastupd, updateInterval,¬ delayInterval, GrayLineFlag if GrayLineFlag is "true" then if (the ticks - lastact) > delayInterval then if ((the ticks - lastupd) > updateInterval) then DoGraylineNow else if ((the ticks - itime) > (updateInterval/ 3)) then DoGrayLineTask end if end if end if if needfix is "yes" then fixfonts put "no" into needfix end if if (timecvt(the time) is not cd field "Localtime") then UpdateTime DoSunPos end if if the visible of cd fld "timeinfo" is true then put round((updateinterval/3 + itime - the ticks)/60) && "until next task" & return &¬ round((updateinterval + lastupd - the ticks)/60) && "until out of date" ¬ & return & round((delayinterval + lastact - the ticks)/60) && "until next check"¬ into cd fld "timeinfo" end if pass idle end idle </script> </card> card_3866.xml <?xml version="1.0" encoding="utf-8" ?> <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" > <card> <id>3866</id> <filler1>0</filler1> <bitmap>BMAP_4763.pbm</bitmap> <cantDelete> <true /> </cantDelete> <showPict> <true /> </showPict> <dontSearch> <false /> </dontSearch> <owner>2672</owner> <link rel="stylesheet" type="text/css" href="stylesheet_3289.css" /> <part> <id>1</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>490</left> <top>179</top> <right>512</right> <bottom>200</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>6720</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>goback</name> <script>--——————— card button "goback" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp(globals:lastact),mousewithin -- --——————– on mouseUp global lastact put the ticks into lastact visual scroll right go cd "c1" updatelocation updatetime end mouseUp on mousewithin HCBalloon "Click here to return to the main card." end mousewithin</script> </part> <part> <id>2</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>14</left> <top>71</top> <right>110</right> <bottom>90</bottom> </rect> <style>checkbox</style> <showName> <true /> </showName> <highlight> <true /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>Time Zone</name> <script>--——————— card button "Time Zone" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is true then show btn "tzhide" else hide btn "tzhide" end if hidecheck end mouseUp on mousewithin if the highlight of me is "true" then HCBalloon "Uncheck this to specify your time zone manually.",15,10 else HCBalloon "Check this to use the values stored in parameter RAM for your time zone.",15,10 end if end mousewithin</script> </part> <part> <id>3</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>14</left> <top>54</top> <right>110</right> <bottom>72</bottom> </rect> <style>checkbox</style> <showName> <true /> </showName> <highlight> <true /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>Location</name> <script>--——————— card button "Location" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is true then show btn "lochide" else hide btn "lochide" end if hidecheck end mouseUp on mousewithin if the highlight of me is "true" then HCBalloon "Uncheck this to specify your location manually.",25,10 else HCBalloon "Check this to use the values stored in parameter RAM for your location.",25,10 end if end mousewithin</script> </part> <part> <id>4</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <false /> </lockText> <rect> <left>210</left> <top>71</top> <right>278</right> <bottom>89</bottom> </rect> <style>rectangle</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>right</textAlign> <font>Geneva</font> <textSize>12</textSize> <textStyle>plain</textStyle> <textHeight>16</textHeight> <name>lat</name> <script>--——————— card field "lat" 10/6/91 10:30 PM -- -- HANDLERS: mousewithin -- --——————– on mousewithin HCBalloon "Enter your latitude in this field." end mousewithin</script> </part> <part> <id>5</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>288</left> <top>57</top> <right>318</right> <bottom>77</bottom> </rect> <style>radiobutton</style> <showName> <true /> </showName> <highlight> <true /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>N</name> <script>--——————— card button "N" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is "false" then set the highlight of me to "true" set the highlight of btn "S" to "false" end if end mouseUp on mousewithin HCBalloon "Click here if your latitude is north of the equator.",0,10 end mousewithin</script> </part> <part> <id>6</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>288</left> <top>76</top> <right>318</right> <bottom>96</bottom> </rect> <style>radiobutton</style> <showName> <true /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>S</name> <script>--——————— card button "S" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is "false" then set the highlight of me to "true" set the highlight of btn "N" to "false" end if end mouseUp on mousewithin HCBalloon "Click here if your latitude is south of the equator.",0,10 end mousewithin</script> </part> <part> <id>7</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>288</left> <top>113</top> <right>318</right> <bottom>133</bottom> </rect> <style>radiobutton</style> <showName> <true /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>E</name> <script>--——————— card button "E" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is "false" then set the highlight of me to "true" set the highlight of btn "W" to "false" end if end mouseUp on mousewithin HCBalloon "Click here if your longitude is east of Greenwich.",0,10 end mousewithin</script> </part> <part> <id>8</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>288</left> <top>132</top> <right>318</right> <bottom>152</bottom> </rect> <style>radiobutton</style> <showName> <true /> </showName> <highlight> <true /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>W</name> <script>--——————— card button "W" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is "false" then set the highlight of me to "true" set the highlight of btn "E" to "false" end if end mouseUp on mousewithin HCBalloon "Click here if your longitude is west of Greenwich.",0,10 end mousewithin</script> </part> <part> <id>9</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <false /> </lockText> <rect> <left>210</left> <top>127</top> <right>278</right> <bottom>145</bottom> </rect> <style>rectangle</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>right</textAlign> <font>Geneva</font> <textSize>12</textSize> <textStyle>plain</textStyle> <textHeight>16</textHeight> <name>lon</name> <script>--——————— card field "lon" 10/6/91 10:31 PM -- -- HANDLERS: mousewithin -- --——————– on mousewithin HCBalloon "Enter your longitude in this field." end mousewithin</script> </part> <part> <id>10</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>194</left> <top>0</top> <right>335</right> <bottom>179</bottom> </rect> <style>opaque</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>lochide</name> <script></script> </part> <part> <id>14</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <false /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <false /> </lockText> <rect> <left>440</left> <top>55</top> <right>488</right> <bottom>73</bottom> </rect> <style>rectangle</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>Geneva</font> <textSize>12</textSize> <textStyle>plain</textStyle> <textHeight>16</textHeight> <name>tz</name> <script>--——————— card field "tz" 10/6/91 10:31 PM -- -- HANDLERS: mousewithin -- --——————– on mousewithin HCBalloon "Enter your time zone difference here." end mousewithin</script> </part> <part> <id>11</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>345</left> <top>28</top> <right>507</right> <bottom>157</bottom> </rect> <style>opaque</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>tzhide</name> <script></script> </part> <part> <id>21</id> <type>button</type> <visible> <false /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>104</left> <top>58</top> <right>161</right> <bottom>84</bottom> </rect> <style>roundrect</style> <showName> <true /> </showName> <highlight> <false /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>By Call</name> <script>--——————— card button "By Call" 10/6/91 10:30 PM -- -- HANDLERS: mouseup,install,mousewithin -- --——————– on mouseup ask "Enter your callsign" if the result is "Cancel" then exit mouseup put CallToNum(it) into nia if item 1 of nia is 1 then put NumToInfo(item 2 of nia) into ni install ni else if item 1 of nia is 0 then answer "Sorry, that call is not recognized." with "OK" else put empty into cl put empty into scl repeat with i = 2 to (number of items in nia) put NumToInfo(item i of nia) & return after cl put item 2 of line i-1 of cl & return after scl end repeat put XScrollBox(0,"Ambiguous call - Select one:",scl) into ans if ans is not empty then put line (item 1 of ans) of cl into ni install ni end if end if end mouseup on install ni if the highlight of btn "location" is false then put abs(item 7 of ni) into cd fld "lat" if item 7 of ni < 0 then set the highlight of btn "N" to false set the highlight of btn "S" to true else set the highlight of btn "N" to true set the highlight of btn "S" to false end if put abs(item 8 of ni) into cd fld "lon" if item 8 of ni < 0 then set the highlight of btn "E" to false set the highlight of btn "W" to true else set the highlight of btn "E" to true set the highlight of btn "W" to false end if end if if the highlight of btn "time zone" is false then put item 6 of ni into cd fld "tz" end if end install on mousewithin HCBalloon "Click here to set your location and time zone by call sign. You will be prompted to enter a call sign or prefix.",7,7 end mousewithin</script> </part> <part> <id>22</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>13</left> <top>103</top> <right>181</right> <bottom>122</bottom> </rect> <style>checkbox</style> <showName> <true /> </showName> <highlight> <false /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>Draw grayline on open</name> <script>--——————— card button "Draw grayline on open" 10/6/91 10:30 PM -- -- HANDLERS: mousewithin -- --——————– on mousewithin if the highlight of me is "true" then HCBalloon "Uncheck this to prevent the grayline from being drawn immediately when the stack is opened.",12,10 else HCBalloon "Check this to draw the grayline immediately when the stack is opened.",12,10 end if end mousewithin</script> </part> <part> <id>23</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>13</left> <top>123</top> <right>181</right> <bottom>142</bottom> </rect> <style>checkbox</style> <showName> <true /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>icago~</font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>24 hour time format</name> <script>--——————— card button "24 hour time format" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp(globals:t24),mousewithin -- --——————– on mouseUp global t24 if the highlight of me is true then set the highlight of me to false put "false" into t24 else set the highlight of me to true put "true" into t24 end if end mouseUp on mousewithin if the highlight of me is "true" then HCBalloon "Uncheck this to display the time in a 12-hour format.",20,10 else HCBalloon "Check this to display the time in a 24-hour format.",20,10 end if end mousewithin</script> </part> <part> <id>24</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>13</left> <top>143</top> <right>170</right> <bottom>160</bottom> </rect> <style>checkbox</style> <showName> <true /> </showName> <highlight> <true /> </highlight> <autoHighlight> <true /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>icago~</font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>auto daylight savings</name> <script>--——————— card button "auto daylight savings" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is "false" then show btn "summer time" show btn "standard time" else hide btn "summer time" hide btn "standard time" end if end mouseUp on mousewithin if the highlight of me is "true" then HCBalloon "Uncheck this to specify standard or daylight savings time manually.",5,10 else HCBalloon "Check this to determine automatically if daylight savings time is in effect. The rules applied are those used in the USA.",5,10 end if end mousewithin</script> </part> <part> <id>25</id> <type>button</type> <visible> <false /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>24</left> <top>178</top> <right>137</right> <bottom>194</bottom> </rect> <style>radiobutton</style> <showName> <true /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>icago~</font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>summer time</name> <script>--——————— card button "summer time" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is "false" then set the highlight of me to "true" set the highlight of btn "standard time" to "false" end if end mouseUp on mousewithin HCBalloon "Click here to specify summer time (daylight savings time).",10,10 end mousewithin</script> </part> <part> <id>26</id> <type>button</type> <visible> <false /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>24</left> <top>162</top> <right>137</right> <bottom>178</bottom> </rect> <style>radiobutton</style> <showName> <true /> </showName> <highlight> <true /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>icago~</font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>standard time</name> <script>--——————— card button "standard time" 10/6/91 10:30 PM -- -- HANDLERS: mouseUp,mousewithin -- --——————– on mouseUp if the highlight of me is "false" then set the highlight of me to "true" set the highlight of btn "summer time" to "false" end if end mouseUp on mousewithin HCBalloon "Click here to specify standard time.",10,10 end mousewithin</script> </part> <content> <layer>card</layer> <id>4</id> <text>39</text> </content> <content> <layer>card</layer> <id>9</id> <text>77</text> </content> <content> <layer>card</layer> <id>14</id> <text>-5</text> </content> <name>config</name> <script>--——————— card "config" 10/6/91 10:30 PM -- -- HANDLERS: hidecheck -- --——————– on hidecheck if the highlight of btn "location" is true and¬ the highlight of btn "time zone" is true then hide btn "by call" else show btn "by call" end if end hidecheck </script> </card> card_2241.xml <?xml version="1.0" encoding="utf-8" ?> <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" > <card> <id>2241</id> <filler1>0</filler1> <bitmap>BMAP_2498.pbm</bitmap> <cantDelete> <true /> </cantDelete> <showPict> <true /> </showPict> <dontSearch> <false /> </dontSearch> <owner>2672</owner> <link rel="stylesheet" type="text/css" href="stylesheet_3289.css" /> <name>c2</name> <script>--——————— card "c2" 10/6/91 10:31 PM -- -- HANDLERS: idle,domenu -- --——————– on idle -- end idle on domenu thing if thing is "Delete Card" then answer "This stack will not operate without this card!" end if pass domenu end domenu </script> </card> card_3023.xml <?xml version="1.0" encoding="utf-8" ?> <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" > <card> <id>3023</id> <filler1>0</filler1> <cantDelete> <true /> </cantDelete> <showPict> <true /> </showPict> <dontSearch> <false /> </dontSearch> <owner>2672</owner> <link rel="stylesheet" type="text/css" href="stylesheet_3289.css" /> <name>c3</name> <script>--——————— card "c3" 10/6/91 10:31 PM -- -- HANDLERS: idle,domenu -- --——————– on idle -- end idle on domenu thing if thing is "Delete Card" then answer "This stack will not operate without this card!" end if pass domenu end domenu </script> </card>